home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 25 / AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso / Service / Future / BEGIN < prev    next >
Text File  |  2000-05-08  |  755b  |  27 lines

  1. ;Im Moment funktioniert der Which-Check nur, wenn C: KEIN ROOT ist, also nicht
  2. ; C:=Workbench:, sondern C: = Workbench:c/ <- wegen dem Schrägstrich
  3. if not exists ram:t
  4. makedir ram:t
  5. endif ;Siehste, so einfach geht das! :)
  6. assign exists AFCD: >NIL:
  7. IF warn
  8. requestchoice "Amiga Future (C)" "Die CD ist nicht angemeldet!*nBitte zuerst Quickstart starten." "Exit" >NIL:
  9. quit;Keine CD angemeldet
  10. endif
  11. assign vorher: ""
  12. assign guis: ""
  13.  
  14. set whichcount 0 ;Anzahl der Dateien im falschen Dir
  15. delete t:filess t:reqtools >NIL: ;Killt temporäre Dateien!
  16. setenv .val 0 ;Für G4C
  17. set updater 5 ;Nur bis nach ReadOut!
  18. if $apcdni eq 1
  19. Gui vorher:Gauge_glow.gc ;Startet Anzeige
  20. else
  21. gui vorher:gauge.gc
  22. endif
  23. wait 1
  24. setenv .val 100
  25. gui vorher:sub.gc
  26. wait 1
  27. setenv .val 0